Search for REGEXP, starting from point, and narrow to page it is in." (byte-code "└┴┬ «ü─\"!Cç" [read-string format "Search for `%s' (end with RET): " pages-last-search "regexp"] 4)])
(autoload 'sort-subr "sort" "\
Primary function for sorting." t nil)
(fset 'sort-pages-in-region #[(reverse beg end) "î }êebê┬ ─┼#)ç" [beg end sort-subr reverse #[nil "└ ┬├#ê─┬wç" [re-search-forward page-delimiter nil t " \n"] 4] #[nil "└ ┬├#½ä─öbçdbç" [re-search-forward page-delimiter nil t 0] 4]] 4 "\
Sort pages in region alphabetically. Prefix arg means reverse order.
Called from a program, there are three arguments:
REVERSE (non-nil means reverse order), BEG and END (region to sort)." "P\nr"])
(fset 'set-page-delimiter #[(regexp reset-p) "└┴!ê└┬!ê «ü\n ¼ä ¬é t¡ä┼╞\n\"ç" [make-local-variable original-page-delimiter page-delimiter reset-p regexp message "The value of `page-delimiter' is now: %s"] 3 "\
Set buffer local value of page-delimiter to REGEXP.
Called interactively with a prefix argument, reset page-delimiter to
its original value.
In a program, non-nil second arg causes first arg to be ignored and
resets the page-delimiter to the original value." (byte-code "½ä ┬Dç├─\"┬Dç" [current-prefix-arg original-page-delimiter nil read-string "Set page-delimiter to regexp: " page-delimiter] 3)])
Display a directory of the page headers in a temporary buffer.
A header is the first non-blank line after the page-delimiter.
You may move point to one of the lines in the temporary buffer,
then use C-c C-c to go to the same line in the pages buffer.
In interactive use:
1. With no prefix arg, display all headers.
2. With prefix arg, display the headers of only those pages that
contain matches to a regular expression for which you are
prompted.
3. With numeric prefix arg, for every page, print the number of
lines within each page.
4. With negative numeric prefix arg, for only those pages that
match a regular expression, print the number of lines within
each page.
When called from a program, non-nil first arg means list all headers;
non-nil second arg means print numbers of lines in each page; if first
arg is nil, optional third arg is regular expression.
If the buffer is narrowed, the pages-directory command creates a
directory for only the accessible portion of the buffer." (byte-code "¼à┴┬ëEç<½Ä┬ë├─┼«ü╟\"!Eç╚!╔V½à┴ë┬Eç╚!╔W¡ì┬┴├─┼«ü╟\"!Eç" [current-prefix-arg t nil read-string format "Select according to `%s' (end with RET): " pages-directory-previous-regexp "regexp" prefix-numeric-value 0] 6)])
*Standard name for file of addresses. Entries separated by page-delimiter.
Used by `pages-directory-for-addresses' function.")
(defvar pages-directory-for-addresses-narrowing-p t "\
*If non-nil, `pages-directory-goto' narrows addresses buffer to entry.")
(fset 'pages-directory-for-addresses #[(&optional filename) "t½ê└┴\n«ü \"ê─\n«ü !½▒┼╞\n«ü !!qê~ê╟╚╔ë#ê╩ ê ═ êèebê`è╔ê`)|ê╬cê╧╔!)ç╨╤!ç" [message "Creating directory for: %s " filename pages-addresses-file-name file-exists-p find-file-noselect expand-file-name pages-directory t nil pages-directory-address-mode pages-directory-for-addresses-narrowing-p pages-directory-buffer-narrowing-p delete-other-windows "=== Address List Directory: use `C-c C-c' to go to page under cursor. ===" set-buffer-modified-p error "No addresses file found!"] 4 "\
Find addresses file and display its directory.
By default, create and display directory of pages-addresses-file-name.
Optional argument is FILENAME. In interactive use, with prefix
argument, prompt for filename and provide completion.
Move point to one of the lines in the displayed directory,
then use C-c C-c to go to the same line in the addresses buffer." (byte-code "¡ä┴┬ \"Cç" [current-prefix-arg read-file-name "Filename: " pages-addresses-file-name] 3)])
